Delphi Magazine Collection 2001/Delphi Magazine Collection 20001 (2001).iso/DISKS/Issue46/ComCorn/UiMain.dfm/UiMain.txt

Text File | 1999-05-02 | 3.3 KB | 183 lines

object FrmMain: TFrmMain
  Left = 201
  Top = 100
  BorderIcons = [biSystemMenu]
  BorderStyle = bsSingle
  Caption = 'Tic-Tac-Toe'
  ClientHeight = 283
  ClientWidth = 303
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Menu = MainMenu1
  OldCreateOrder = False
  Position = poDefault
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object SbTL: TSpeedButton
    Left = 33
    Top = 19
    Width = 75
    Height = 75
    Flat = True
    OnClick = SBClick
  end
  object SbTM: TSpeedButton
    Tag = 1
    Left = 113
    Top = 19
    Width = 75
    Height = 75
    Flat = True
    OnClick = SBClick
  end
  object SbTR: TSpeedButton
    Tag = 2
    Left = 193
    Top = 19
    Width = 75
    Height = 75
    Flat = True
    OnClick = SBClick
  end
  object SbMM: TSpeedButton
    Tag = 4
    Left = 113
    Top = 99
    Width = 75
    Height = 75
    Flat = True
    OnClick = SBClick
  end
  object SbBL: TSpeedButton
    Tag = 6
    Left = 33
    Top = 179
    Width = 75
    Height = 75
    Flat = True
    OnClick = SBClick
  end
  object SbBR: TSpeedButton
    Tag = 8
    Left = 193
    Top = 179
    Width = 75
    Height = 75
    Flat = True
    OnClick = SBClick
  end
  object SbMR: TSpeedButton
    Tag = 5
    Left = 193
    Top = 99
    Width = 75
    Height = 75
    Flat = True
    OnClick = SBClick
  end
  object SbBM: TSpeedButton
    Tag = 7
    Left = 113
    Top = 179
    Width = 75
    Height = 75
    Flat = True
    OnClick = SBClick
  end
  object SbML: TSpeedButton
    Tag = 3
    Left = 33
    Top = 99
    Width = 75
    Height = 75
    Flat = True
    OnClick = SBClick
  end
  object Bevel1: TBevel
    Left = 28
    Top = 91
    Width = 246
    Height = 7
    Shape = bsBottomLine
  end
  object Bevel2: TBevel
    Left = 110
    Top = 11
    Width = 9
    Height = 250
    Shape = bsLeftLine
  end
  object Bevel3: TBevel
    Left = 28
    Top = 171
    Width = 246
    Height = 7
    Shape = bsBottomLine
  end
  object Bevel4: TBevel
    Left = 190
    Top = 11
    Width = 9
    Height = 250
    Shape = bsLeftLine
  end
  object StatusBar: TStatusBar
    Left = 0
    Top = 264
    Width = 303
    Height = 19
    Panels = <>
    SimplePanel = True
  end
  object MainMenu1: TMainMenu
    object FileItem: TMenuItem
      Caption = '&File'
      object NewGameItem: TMenuItem
        Caption = '&New Game'
        ShortCut = 16462
        OnClick = NewGameItemClick
      end
      object N1: TMenuItem
        Caption = '-'
        ShortCut = 16472
      end
      object ExitItem: TMenuItem
        Caption = 'E&xit'
        ShortCut = 16472
        OnClick = ExitItemClick
      end
    end
    object SkillItem: TMenuItem
      Caption = '&Skill'
      object UnconItem: TMenuItem
        Caption = '&Unconscious'
        GroupIndex = 1
        RadioItem = True
        ShortCut = 16469
        OnClick = SkillItemClick
      end
      object AwakeItem: TMenuItem
        Tag = 1
        Caption = '&Awake'
        Checked = True
        GroupIndex = 1
        RadioItem = True
        ShortCut = 16449
        OnClick = SkillItemClick
      end
    end
    object HelpItem: TMenuItem
      Caption = '&Help'
      object AboutItem: TMenuItem
        Caption = '&About'
        OnClick = AboutItemClick
      end
    end
  end
end